home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 50
/
Aminet 50 (2002)(GTI - Schatztruhe)[!][Aug 2002].iso
/
Aminet
/
util
/
cli
/
AKCC.lha
/
Programmers
/
Examples
/
FPrintf.c
< prev
next >
Wrap
C/C++ Source or Header
|
2002-06-27
|
1KB
|
51 lines
/*
** $VER: AssignName 37.1 (6.9.96)
**
** Demonstrates usage of AKCC_FPrintf()
**
** (C) Copyright 1989-96 Andreas R. Kleinert
** All Rights Reserved.
*/
#define __USE_SYSBASE
#include <akccplus/akccplus_all.h>
#include <proto/akccplus.h>
#include <stdlib.h>
#include <proto/exec.h>
#include <proto/dos.h>
struct AKCCPlusBase *AKCCPlusBase = N;
void main(long argc, char **argv)
{
AKCCPlusBase = (struct AKCCPlusBase *) OpenLibrary("akccplus.library", 37);
if(AKCCPlusBase)
{
char parsed_string[256];
ULONG fp_args[2];
AKCC_FPrintf(Output(), "\nFPrintf V37.1, FREEWARE, (c) 1993-96 by Andreas R. Kleinert.\n", N);
AKCC_ParseText("\nAll output is done via the \\B\\U%s\\N function"
"\ninstead of printf() and is parsed through the"
"\n\\B\\U%s\\N function for styling.\n", parsed_string);
fp_args[0] = (ULONG) "AKCC_FPrintf()";
fp_args[1] = (ULONG) "AKCC_ParseText()";
AKCC_FPrintf(Output(), parsed_string, &fp_args[0]);
CloseLibrary((APTR) AKCCPlusBase);
}else
{
puts("\n Can't open \42akccplus.library\42 V37+ !\n");
}
exit(0);
}